home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 3-Pak - Disc 3
/
Infomagic - Windows 3-Pak (Disc 3 of 3).iso
/
Telnet-Clients
/
HOSTACCESS.exe
/
MISC.1
/
LOGIN.MCR
< prev
next >
Wrap
Text File
|
1996-01-22
|
1KB
|
47 lines
rem Simple macro to login to a system which requires
rem a login name and a password.
DIM I as integer
I=0
rem
rem Wake up the connection by sending carriage return
send "CR"
loopy:
wait timeout 30
rem
rem When text received fom host, which contains ogin
rem then send the login user name.
case "ogin: "
I=I+1
rem
rem check to see if three attempts have been made
if I > 3 then
print "three attempts have been made to log on"
goto final
endif
send "'root'CR"
delay 3
case "word:"
rem rem send the password when requested by host
send "'XZY123DDD'CR"
delay 3
case "(ansi) "
rem
rem When the emulation is requested by the system
rem and the default is going to be ansi, change
rem the emulation to adds
send "'adds'CR"
delay 2
case "# "
rem
rem when logged in and the shell prompt is displayed
rem send the command to startup the application
send "'termite.demo.sh'CR"
delay 2
case ">"
end
end wait
goto loopy
final:
print "at final"
end